home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Compute! Gazette 1995 February
/
1995-02b.d64
/
warriors inst
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-09-20
|
3KB
|
66 lines
2 rem warriors instructions q-link disk # (pd 51-52work) .
20 poke53280,12:poke53281,12:print"[147]"
21 printtab(26)"[159][201]nstructions[145][145][145][158]"
22 fort=1to2
25 print" [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]
30 [153]" (NULL) wait(NULL)
35 print" [221] [215] [193] [210] [210] [201] [207] [210] [211] [146][221] [201]nstructions
40 [153]" (NULL) wait(NULL)
45 print" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
47 [153]"list ortantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantan^
50 print" [221] [217]our mission is to enter the [146][221]"
52 print" [221] giant's land, destroy the king [146][221]"
54 print" [221] and get his crown. [146][221]"
56 print" [221] 1 or 2 can play, when one plays [146][221]"
58 print" [221] use either joystick. [215]hen two [146][221]"
60 print" [221] play use both joysticks. [197]ach [146][221]"
62 print" [221] player must press fire button to [146][221]
64 [153]" (NULL) commence playing game. (NULL)ou both wait(NULL)
66 print" [221] are in a race to kill the king [146][221]
68 [153]" (NULL) and get his crown. (NULL)ou do not wait(NULL)
70 print" [221] fight each other. 3 lives each. [146][221]
72 [153]" (NULL) mid$ust work your way north (towardswait(NULL)
74 print" [221] the top of the screen) and throw [146][221]
76 [153]" (NULL) your axe at anything or anyone wait(NULL)
78 print" [173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]
80 [153]"open (NULL)ressclose<(NULL)(NULL)atnlenval> to continueonon
90 ford=1to300:next:print""
95 next:ford=1to300:next:print"[158]"
100 gety$:ify$=""then22
112 print"[155] [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]
114 [153]" (NULL) that comes your way. wait(NULL)"
116 [153]" (NULL) wait(NULL)
118 print" [221] [215]hen you come to the [199][201][193][206][212][211] it [146][221]"
120 print" [221] will take several hits with your [146][221]"
122 print" [221] axe to eliminate them. [146][221]"
124 print" [221] [146][221]
126 [153]" (NULL) (NULL)ou get an extra life every wait(NULL)
128 print" [221] 10,000 points. [146][221]"
130 print" [221] [146][221]
132 [153]" (NULL) chr$ood (NULL)uck!! (NULL)ou'll need it. wait(NULL)"
134 [153]" (NULL) wait(NULL)
136 print" [221] [146][221]
138 [153]" (NULL) wait(NULL)
140 print" [221] [146][221]
142 [153]" /tantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantantanexp
144 print"[159] [208]ress[160]<[211][208][193][195][197]> to continue[145][145]
146 [161]y$:[139]y$[178]""[167]146
184 [153]""[163]14)"ortantantantantantantantantantantan^
186 printtab(14)"[221][159][206]ow! [199]o get[221]
188 [153][163]14)"(NULL) (NULL)
190 printtab(14)"[221] [159]those bad [221]
192 [153][163]14)"(NULL) (NULL)
194 printtab(14)"[221][159]ole [199]iants[221]
196 [153][163]14)"/tantantantantantantantantantantanexp
198 print" [208]ress <[210]> to review "
200 print" <[209]> to quit - <[204]> to load [145]"
204 getj$:ifj$<>"r"andj$<>"l"andj$<>"q"then204
206 ifj$="r"thenrun
208 ifj$="l"then300
210 goto400
300 print"[147][142][152]load"chr$(34)"warriors ldr"chr$(34)",8[155]":print"run";
310 poke631,13:poke632,13:poke198,2:end
400 print"[147]":poke53280,4:poke53281,7
410 fort=1to76:print"[151][188][165]* [150]warriors";
420 next:print"[151][188][165]* [150]warr